Software of the Month Club 1999 July/Software of the Month - Ultimate Collection Shareware 263.iso/mac/Business/Y2K Assistant/action.Dxr/00036.ls

Text File | 1999-03-02 | 5.5 KB | 124 lines

on spec0499
  if word 3 of the long date = "1," then
    go(37)
  else
    if word 3 of the long date = "2," then
      go(37)
    else
      if word 3 of the long date = "3," then
        go(38)
      else
        if word 3 of the long date = "4," then
          go(38)
        else
          if word 3 of the long date = "5," then
            go(38)
          else
            if word 3 of the long date = "6," then
              go(38)
            else
              if word 3 of the long date = "7," then
                go(38)
              else
                if word 3 of the long date = "8," then
                  go(38)
                else
                  if word 3 of the long date = "9," then
                    go(38)
                  else
                    if word 3 of the long date = "10," then
                      go(39)
                    else
                      if word 3 of the long date = "11," then
                        go(39)
                      else
                        if word 3 of the long date = "12," then
                          go(39)
                        else
                          if word 3 of the long date = "13," then
                            go(39)
                          else
                            if word 3 of the long date = "14," then
                              go(39)
                            else
                              if word 3 of the long date = "15," then
                                go(39)
                              else
                                if word 3 of the long date = "16," then
                                  go(39)
                                else
                                  if word 3 of the long date = "17," then
                                    go(40)
                                  else
                                    if word 3 of the long date = "18," then
                                      go(40)
                                    else
                                      if word 3 of the long date = "19," then
                                        go(40)
                                      else
                                        if word 3 of the long date = "20," then
                                          go(40)
                                        else
                                          if word 3 of the long date = "21," then
                                            go(40)
                                          else
                                            if word 3 of the long date = "22," then
                                              go(40)
                                            else
                                              if word 3 of the long date = "23," then
                                                go(40)
                                              else
                                                if word 3 of the long date = "24," then
                                                  go(41)
                                                else
                                                  if word 3 of the long date = "25," then
                                                    go(41)
                                                  else
                                                    if word 3 of the long date = "26," then
                                                      go(41)
                                                    else
                                                      if word 3 of the long date = "27," then
                                                        go(41)
                                                      else
                                                        if word 3 of the long date = "28," then
                                                          go(41)
                                                        else
                                                          if word 3 of the long date = "29," then
                                                            go(41)
                                                          else
                                                            if word 3 of the long date = "30," then
                                                              go(41)
                                                            else
                                                              go(77)
                                                            end if
                                                          end if
                                                        end if
                                                      end if
                                                    end if
                                                  end if
                                                end if
                                              end if
                                            end if
                                          end if
                                        end if
                                      end if
                                    end if
                                  end if
                                end if
                              end if
                            end if
                          end if
                        end if
                      end if
                    end if
                  end if
                end if
              end if
            end if
          end if
        end if
      end if
    end if
  end if
end